home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Purity / Purity #34 (1994-08)(Diesel)(DE)[WB].zip / Purity #34 (1994-08)(Diesel)(DE)[WB].adf / IncludesPCQ / gfxbase.i < prev    next >
Text File  |  1994-08-06  |  4KB  |  115 lines
  1. {
  2.         GfxBase.i for PCQ Pascal
  3. }
  4.  
  5. {$I   "Include:Exec/Lists.i"}
  6. {$I   "Include:Exec/Libraries.i"}
  7. {$I   "Include:Exec/Interrupts.i"}
  8. {$I   "Include:exec/Semaphores.i"}
  9. {$I   "Include:Graphics/Monitor.i"}
  10.  
  11. type
  12.  
  13.     GfxBaseRec = record
  14.         LibNode         : Library;
  15.         ActiView        : Address;      { ViewPtr }
  16.         copinit         : Address; { (copinitptr) ptr to copper start up list }
  17.         cia             : Address;      { for 8520 resource use }
  18.         blitter         : Address;      { for future blitter resource use }
  19.         LOFlist         : Address;
  20.         SHFlist         : Address;
  21.         blthd,
  22.         blttl           : Address;
  23.         bsblthd,
  24.         bsblttl         : Address;      { Previous four are (bltnodeptr) }
  25.         vbsrv,
  26.         timsrv,
  27.         bltsrv          : Interrupt;
  28.         TextFonts       : List;
  29.         DefaultFont     : Address;      { TextFontPtr }
  30.         Modes           : Short;        { copy of current first bplcon0 }
  31.         VBlank          : Byte;
  32.         Debug           : Byte;
  33.         BeamSync        : Short;
  34.         system_bplcon0  : Short; { it is ored into each bplcon0 for display }
  35.         SpriteReserved  : Byte;
  36.         bytereserved    : Byte;
  37.         Flags           : Short;
  38.         BlitLock        : Short;
  39.         BlitNest        : Short;
  40.  
  41.         BlitWaitQ       : List;
  42.         BlitOwner       : Address;      { TaskPtr }
  43.         TOF_WaitQ       : List;
  44.         DisplayFlags    : Short;        { NTSC PAL GENLOC etc}
  45.  
  46.                 { Display flags are determined at power on }
  47.  
  48.         SimpleSprites   : Address;      { SimpleSpritePtr ptr }
  49.         MaxDisplayRow   : Short;        { hardware stuff, do not use }
  50.         MaxDisplayColumn : Short;       { hardware stuff, do not use }
  51.         NormalDisplayRows : Short;
  52.         NormalDisplayColumns : Short;
  53.  
  54.         { the following are for standard non interlace, 1/2 wb width }
  55.  
  56.         NormalDPMX      : Short;        { Dots per meter on display }
  57.         NormalDPMY      : Short;        { Dots per meter on display }
  58.         LastChanceMemory : Address;     { SignalSemaphorePtr }
  59.         LCMptr          : Address;
  60.         MicrosPerLine   : Short;        { 256 time usec/line }
  61.         MinDisplayColumn : Short;
  62.         ChipRevBits0    : Byte;
  63.         crb_reserved  :  Array[0..4] of Byte;
  64.         monitor_id  : Short;             { normally null }
  65.         hedley  : Array[0..7] of Integer;
  66.         hedley_sprites  : Array[0..7] of Integer;     { sprite ptrs for intuition mouse }
  67.         hedley_sprites1 : Array[0..7] of Integer;            { sprite ptrs for intuition mouse }
  68.         hedley_count    : Short;
  69.         hedley_flags    : Short;
  70.         hedley_tmp      : Short;
  71.         hash_table      : Address;
  72.         current_tot_rows : Short;
  73.         current_tot_cclks : Short;
  74.         hedley_hint     : Byte;
  75.         hedley_hint2    : Byte;
  76.         nreserved       : Array[0..3] of Integer;
  77.         a2024_sync_raster : Address;
  78.         control_delta_pal : Short;
  79.         control_delta_ntsc : Short;
  80.         current_monitor : MonitorSpecPtr;
  81.         MonitorList     : List;
  82.         default_monitor : MonitorSpecPtr;
  83.         MonitorListSemaphore : SignalSemaphorePtr;
  84.         DisplayInfoDataBase : Address;
  85.         ActiViewCprSemaphore : SignalSemaphorePtr;
  86.         UtilityBase  : Address;           { for hook AND tag utilities   }
  87.         ExecBase     : Address;              { to link with rom.lib }
  88.     end;
  89.     GfxBasePtr = ^GfxBaseRec;
  90.  
  91. const
  92.  
  93.     NTSC        = 1;
  94.     GENLOC      = 2;
  95.     PAL         = 4;
  96.     TODA_SAFE   = 8;
  97.  
  98.     BLITMSG_FAULT = 4;
  99.  
  100. { bits defs for ChipRevBits }
  101.     GFXB_BIG_BLITS = 0;
  102.     GFXB_HR_AGNUS  = 0;
  103.     GFXB_HR_DENISE = 1;
  104.  
  105.     GFXF_BIG_BLITS = 1;
  106.     GFXF_HR_AGNUS  = 1;
  107.     GFXF_HR_DENISE = 2;
  108.  
  109.  GRAPHICSNAME  =  "graphics.library";
  110.  
  111.  
  112.  
  113.  
  114.  
  115.